/PrintEPS { 
[/newURy /newURx /newLLy /newLLx /URy /URx /LLy /LLx] { exch def } forall
/scaleLLx newURx newLLx sub  URx LLx sub  div def
/scaleLLy newURy newLLy sub  URy LLy sub  div def
newLLx newLLy translate scaleLLx scaleLLy scale
LLx neg LLy neg translate } bind def